home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / Training / HyperCard 2.0 Training / Intro to HyperCard 2.0 / card_5184.txt < prev    next >
Encoding:
Text File  |  1990-08-24  |  6.5 KB  |  246 lines
  1. -- card: 5184 from stack: in.0
  2. -- bmap block id: 5818
  3. -- flags: 0000
  4. -- background id: 10646
  5. -- name: go to main menu
  6. ----- HyperTalk script -----
  7. -- Navigation from the Main Menu
  8. --
  9. -- When the icon or text of a section is click
  10. -- the icon stays on the screen and the other icons an the text dissolve
  11. -- the top banner splits in the middle
  12. -- the selected icon flashes and zooms into a header
  13. -- the menu options for that section appear.
  14. --
  15. --    Globals
  16. --      DisSpeed:  the speed for the visual dissolve
  17. --      StdDelay:  a standard delay for hilites and travel transitions
  18. --    Locals
  19. --      DestName:  is "Section X:" where X should be 1, 2 or 3
  20. --                 this name is shared by the btn of the section
  21. --                 the btns in the interm cds
  22. --                 the fld that indicates if the section has been seen
  23. --                 the name of the first cd of this section
  24. --
  25. on mouseUp
  26.   global  DisSpeed, StdDelay
  27.  
  28.   -- is this a valid mouseUp?
  29.   if "button" is in the name of the target then
  30.     put the short name of the target into destName
  31.  
  32.     -- is this the first time we are going to that section?
  33.     if cd fld destName is "first time" then
  34.       -- flag that we've seen this animation
  35.       put "It has been seen" into cd fld destName
  36.  
  37.       -- go to the intermediate cd
  38.       set the style of btn destName of cd "animTitle2" to "transparent"
  39.       visual DisSpeed
  40.       go to cd "animTitle2"
  41.       -- split the title graphic
  42.       choose select tool
  43.       drag from 144,1 to 315,62
  44.       set the dragSpeed to 1000
  45.       drag from 144,1 to 1,1
  46.       choose browse tool
  47.       -- blink the big icon and hide it
  48.       repeat 2
  49.         set the hilite of btn destName to not the hilite of btn destName
  50.         wait StdDelay
  51.       end repeat
  52.       set the style of btn destName to "opaque"
  53.       -- zoom from the BigIcon to the top middle title
  54.       ZoomRect the rect of btn destName, the rect of cd fld destName
  55.       show cd fld destName
  56.       wait StdDelay
  57.       -- zoom the main menu title to mainMenuIcon
  58.       repeat 2
  59.         set the hilite of btn "menuTitle" to not the hilite of btn "menuTitle"
  60.         wait StdDelay
  61.       end repeat
  62.       hide cd fld "menuTitle"
  63.       zoomRect the rect of btn "menuTitle", the rect of btn "mainMenuIcon"
  64.       lock screen
  65.       --      hide btn "grey1"
  66.       --      hide btn "grey2"
  67.       unlock screen
  68.       -- reset the intermediate card
  69.       lock screen
  70.       hide cd fld destName
  71.       --      show btn "grey1"
  72.       --      show btn "grey2"
  73.       show cd fld "menuTitle"
  74.       choose select tool
  75.       doMenu "revert"
  76.       choose browse tool
  77.  
  78.       -- go to the real cd
  79.       go cd destName
  80.       unlock screen with DisSpeed
  81.     else
  82.       visual DisSpeed
  83.       go cd destName
  84.     end if
  85.   end if
  86. end mouseUp
  87.  
  88.  
  89.  
  90. -- part 1 (field)
  91. -- low flags: 01
  92. -- high flags: 0000
  93. -- rect: left=140 top=97 right=330 bottom=465
  94. -- title width / last selected line: 0
  95. -- icon id / first selected line: 0 / 0
  96. -- text alignment: 0
  97. -- font id: 174
  98. -- text size: 14
  99. -- style flags: 0
  100. -- line height: 14
  101. -- part name: 
  102. ----- HyperTalk script -----
  103. -- One field sending mouseUp to three different btns
  104. --   we get the line and calculate what btn it corresponds to
  105. --   NOTE: the lines must end in a return
  106. --         the number of lines per section should be equal
  107. --         in this case there are 4 lines per section.
  108. -- ************************************************************
  109. on mouseUp
  110.   put 2 into XtraTopLns
  111.  
  112.   -- compute line number clicked
  113.   get item 2 of the clickLoc - top of me
  114.   put 1 + it div the textHeight of me into lineNum
  115.  
  116.   -- get rid off the top lines
  117.   subtract XtraTopLns from lineNum
  118.   if lineNum > 0 then
  119.  
  120.     -- get the top line of a set of 4
  121.     put lineNum - ( (lineNum-1) mod 5) into lineNum
  122.     add XtraTopLns to lineNum
  123.  
  124.     -- send it to the corresponding line
  125.     put word 1 of line lineNum of me && word 2 of line lineNum of me into btnName
  126.     send mouseUp to btn btnName
  127.   end if
  128. end mouseUp
  129.  
  130.  
  131. -- part 2 (button)
  132. -- low flags: 00
  133. -- high flags: 0000
  134. -- rect: left=79 top=124 right=177 bottom=132
  135. -- title width / last selected line: 0
  136. -- icon id / first selected line: 0 / 0
  137. -- text alignment: 1
  138. -- font id: 0
  139. -- text size: 12
  140. -- style flags: 0
  141. -- line height: 16
  142. -- part name: section 1:
  143.  
  144.  
  145. -- part 3 (button)
  146. -- low flags: 00
  147. -- high flags: 0000
  148. -- rect: left=79 top=194 right=247 bottom=132
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: section 2:
  157.  
  158.  
  159. -- part 4 (button)
  160. -- low flags: 00
  161. -- high flags: 0000
  162. -- rect: left=79 top=264 right=317 bottom=132
  163. -- title width / last selected line: 0
  164. -- icon id / first selected line: 0 / 0
  165. -- text alignment: 1
  166. -- font id: 0
  167. -- text size: 12
  168. -- style flags: 0
  169. -- line height: 16
  170. -- part name: section 3:
  171.  
  172.  
  173. -- part 5 (field)
  174. -- low flags: 81
  175. -- high flags: 0000
  176. -- rect: left=10 top=317 right=333 bottom=61
  177. -- title width / last selected line: 0
  178. -- icon id / first selected line: 0 / 0
  179. -- text alignment: 0
  180. -- font id: 3
  181. -- text size: 12
  182. -- style flags: 0
  183. -- line height: 16
  184. -- part name: section 3:
  185.  
  186.  
  187. -- part 6 (field)
  188. -- low flags: 81
  189. -- high flags: 0000
  190. -- rect: left=10 top=300 right=316 bottom=61
  191. -- title width / last selected line: 0
  192. -- icon id / first selected line: 0 / 0
  193. -- text alignment: 0
  194. -- font id: 3
  195. -- text size: 12
  196. -- style flags: 0
  197. -- line height: 16
  198. -- part name: section 2:
  199.  
  200.  
  201. -- part 7 (field)
  202. -- low flags: 81
  203. -- high flags: 0000
  204. -- rect: left=10 top=282 right=298 bottom=61
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 0 / 0
  207. -- text alignment: 0
  208. -- font id: 3
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: section 1:
  213.  
  214.  
  215. -- part contents for background part 8
  216. ----- text -----
  217. M A I N   M E N U
  218.  
  219. -- part contents for card part 1
  220. ----- text -----
  221. Click on the drawings to go to a section.
  222.  
  223. SECTION 1: HYPERCARD BASICS
  224. In this section are descriptions of what HyperCard
  225. is and how to use it, with definitions and a short
  226. history of hypertext and hypermedia.
  227.  
  228. SECTION 2: THE NUTS & BOLTS OF HYPERCARD
  229. Here are introductions to HyperCard‚Äôs components,
  230. as well as more technical descriptions of the
  231. features added with HyperCard 2.0.
  232.  
  233. SECTION 3: SUPPORTING HYPERCARD USERS
  234. This section includes common user questions, a practice scenario, and descriptions of how different audiences can use HyperCard.
  235.  
  236. -- part contents for card part 5
  237. ----- text -----
  238. first time
  239.  
  240. -- part contents for card part 6
  241. ----- text -----
  242. first time
  243.  
  244. -- part contents for card part 7
  245. ----- text -----
  246. first time